3.940 \(\int \frac{(2+3 x) (1+4 x)^m}{\left (1-5 x+3 x^2\right )^2} \, dx\)

Optimal. Leaf size=179 \[ -\frac{\left (2 \left (5+7 \sqrt{13}\right ) m+81\right ) (4 x+1)^{m+1} \, _2F_1\left (1,m+1;m+2;\frac{3 (4 x+1)}{13-2 \sqrt{13}}\right )}{13 \sqrt{13} \left (13-2 \sqrt{13}\right ) (m+1)}+\frac{\left (2 \left (5-7 \sqrt{13}\right ) m+81\right ) (4 x+1)^{m+1} \, _2F_1\left (1,m+1;m+2;\frac{3 (4 x+1)}{13+2 \sqrt{13}}\right )}{13 \sqrt{13} \left (13+2 \sqrt{13}\right ) (m+1)}+\frac{(20-21 x) (4 x+1)^{m+1}}{39 \left (3 x^2-5 x+1\right )} \]

[Out]

((20 - 21*x)*(1 + 4*x)^(1 + m))/(39*(1 - 5*x + 3*x^2)) - ((81 + 2*(5 + 7*Sqrt[13
])*m)*(1 + 4*x)^(1 + m)*Hypergeometric2F1[1, 1 + m, 2 + m, (3*(1 + 4*x))/(13 - 2
*Sqrt[13])])/(13*Sqrt[13]*(13 - 2*Sqrt[13])*(1 + m)) + ((81 + 2*(5 - 7*Sqrt[13])
*m)*(1 + 4*x)^(1 + m)*Hypergeometric2F1[1, 1 + m, 2 + m, (3*(1 + 4*x))/(13 + 2*S
qrt[13])])/(13*Sqrt[13]*(13 + 2*Sqrt[13])*(1 + m))

_______________________________________________________________________________________

Rubi [A]  time = 0.467788, antiderivative size = 179, normalized size of antiderivative = 1., number of steps used = 5, number of rules used = 3, integrand size = 25, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.12 \[ -\frac{\left (2 \left (5+7 \sqrt{13}\right ) m+81\right ) (4 x+1)^{m+1} \, _2F_1\left (1,m+1;m+2;\frac{3 (4 x+1)}{13-2 \sqrt{13}}\right )}{13 \sqrt{13} \left (13-2 \sqrt{13}\right ) (m+1)}+\frac{\left (2 \left (5-7 \sqrt{13}\right ) m+81\right ) (4 x+1)^{m+1} \, _2F_1\left (1,m+1;m+2;\frac{3 (4 x+1)}{13+2 \sqrt{13}}\right )}{13 \sqrt{13} \left (13+2 \sqrt{13}\right ) (m+1)}+\frac{(20-21 x) (4 x+1)^{m+1}}{39 \left (3 x^2-5 x+1\right )} \]

Antiderivative was successfully verified.

[In]  Int[((2 + 3*x)*(1 + 4*x)^m)/(1 - 5*x + 3*x^2)^2,x]

[Out]

((20 - 21*x)*(1 + 4*x)^(1 + m))/(39*(1 - 5*x + 3*x^2)) - ((81 + 2*(5 + 7*Sqrt[13
])*m)*(1 + 4*x)^(1 + m)*Hypergeometric2F1[1, 1 + m, 2 + m, (3*(1 + 4*x))/(13 - 2
*Sqrt[13])])/(13*Sqrt[13]*(13 - 2*Sqrt[13])*(1 + m)) + ((81 + 2*(5 - 7*Sqrt[13])
*m)*(1 + 4*x)^(1 + m)*Hypergeometric2F1[1, 1 + m, 2 + m, (3*(1 + 4*x))/(13 + 2*S
qrt[13])])/(13*Sqrt[13]*(13 + 2*Sqrt[13])*(1 + m))

_______________________________________________________________________________________

Rubi in Sympy [A]  time = 34.5946, size = 136, normalized size = 0.76 \[ \frac{\left (- 273 x + 260\right ) \left (4 x + 1\right )^{m + 1}}{507 \left (3 x^{2} - 5 x + 1\right )} - \frac{2 \left (182 m - \sqrt{13} \left (10 m + 81\right )\right ) \left (4 x + 1\right )^{m + 1}{{}_{2}F_{1}\left (\begin{matrix} 1, m + 1 \\ m + 2 \end{matrix}\middle |{\frac{12 x + 3}{2 \sqrt{13} + 13}} \right )}}{169 \left (4 \sqrt{13} + 26\right ) \left (m + 1\right )} - \frac{2 \left (182 m + \sqrt{13} \left (10 m + 81\right )\right ) \left (4 x + 1\right )^{m + 1}{{}_{2}F_{1}\left (\begin{matrix} 1, m + 1 \\ m + 2 \end{matrix}\middle |{\frac{- 12 x - 3}{-13 + 2 \sqrt{13}}} \right )}}{169 \left (- 4 \sqrt{13} + 26\right ) \left (m + 1\right )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  rubi_integrate((2+3*x)*(1+4*x)**m/(3*x**2-5*x+1)**2,x)

[Out]

(-273*x + 260)*(4*x + 1)**(m + 1)/(507*(3*x**2 - 5*x + 1)) - 2*(182*m - sqrt(13)
*(10*m + 81))*(4*x + 1)**(m + 1)*hyper((1, m + 1), (m + 2,), (12*x + 3)/(2*sqrt(
13) + 13))/(169*(4*sqrt(13) + 26)*(m + 1)) - 2*(182*m + sqrt(13)*(10*m + 81))*(4
*x + 1)**(m + 1)*hyper((1, m + 1), (m + 2,), (-12*x - 3)/(-13 + 2*sqrt(13)))/(16
9*(-4*sqrt(13) + 26)*(m + 1))

_______________________________________________________________________________________

Mathematica [A]  time = 0.0949959, size = 0, normalized size = 0. \[ \int \frac{(2+3 x) (1+4 x)^m}{\left (1-5 x+3 x^2\right )^2} \, dx \]

Verification is Not applicable to the result.

[In]  Integrate[((2 + 3*x)*(1 + 4*x)^m)/(1 - 5*x + 3*x^2)^2,x]

[Out]

Integrate[((2 + 3*x)*(1 + 4*x)^m)/(1 - 5*x + 3*x^2)^2, x]

_______________________________________________________________________________________

Maple [F]  time = 0.157, size = 0, normalized size = 0. \[ \int{\frac{ \left ( 2+3\,x \right ) \left ( 1+4\,x \right ) ^{m}}{ \left ( 3\,{x}^{2}-5\,x+1 \right ) ^{2}}}\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  int((2+3*x)*(1+4*x)^m/(3*x^2-5*x+1)^2,x)

[Out]

int((2+3*x)*(1+4*x)^m/(3*x^2-5*x+1)^2,x)

_______________________________________________________________________________________

Maxima [F]  time = 0., size = 0, normalized size = 0. \[ \int \frac{{\left (4 \, x + 1\right )}^{m}{\left (3 \, x + 2\right )}}{{\left (3 \, x^{2} - 5 \, x + 1\right )}^{2}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((4*x + 1)^m*(3*x + 2)/(3*x^2 - 5*x + 1)^2,x, algorithm="maxima")

[Out]

integrate((4*x + 1)^m*(3*x + 2)/(3*x^2 - 5*x + 1)^2, x)

_______________________________________________________________________________________

Fricas [F]  time = 0., size = 0, normalized size = 0. \[{\rm integral}\left (\frac{{\left (4 \, x + 1\right )}^{m}{\left (3 \, x + 2\right )}}{9 \, x^{4} - 30 \, x^{3} + 31 \, x^{2} - 10 \, x + 1}, x\right ) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((4*x + 1)^m*(3*x + 2)/(3*x^2 - 5*x + 1)^2,x, algorithm="fricas")

[Out]

integral((4*x + 1)^m*(3*x + 2)/(9*x^4 - 30*x^3 + 31*x^2 - 10*x + 1), x)

_______________________________________________________________________________________

Sympy [F]  time = 0., size = 0, normalized size = 0. \[ \int \frac{\left (3 x + 2\right ) \left (4 x + 1\right )^{m}}{\left (3 x^{2} - 5 x + 1\right )^{2}}\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((2+3*x)*(1+4*x)**m/(3*x**2-5*x+1)**2,x)

[Out]

Integral((3*x + 2)*(4*x + 1)**m/(3*x**2 - 5*x + 1)**2, x)

_______________________________________________________________________________________

GIAC/XCAS [F]  time = 0., size = 0, normalized size = 0. \[ \int \frac{{\left (4 \, x + 1\right )}^{m}{\left (3 \, x + 2\right )}}{{\left (3 \, x^{2} - 5 \, x + 1\right )}^{2}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((4*x + 1)^m*(3*x + 2)/(3*x^2 - 5*x + 1)^2,x, algorithm="giac")

[Out]

integrate((4*x + 1)^m*(3*x + 2)/(3*x^2 - 5*x + 1)^2, x)